home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 26
/
Cream of the Crop 26.iso
/
editor
/
par.zip
/
EXAMPL07.POM
< prev
next >
Wrap
Text File
|
1997-06-27
|
335b
|
19 lines
;
; Replace every tab character with two spaces
;
CHANGE $FLINE $TAB " "
;
; Extract the columns
;
SET ProgName = $FLINE[ 1 20]
SET Descrip = $FLINE[22 99]
;
; Trim the spaces
;
TRIM ProgName "B" " "
TRIM Descrip "B" " "
;
; Output the result
;
OUTEND |"{ProgName}","{Descrip}"